home *** CD-ROM | disk | FTP | other *** search
Text File | 1990-09-14 | 1.5 KB | 38 lines | [TEXT/MPS ] |
- #
- # Build the Project Menu
- #
- Set Exit 0
- DeleteMenu Project ≥ Dev:Null > Dev:Null
- Alias HeadersOn "∂
- AddMenu Project 'Use Headers!' HeadersOff ;∂
- Set ProjectHeaders 1"
- Alias HeadersOff "∂
- AddMenu Project 'Use Headers' HeadersOn ;∂
- Set ProjectHeaders 0"
- AddMenu Project 'Add Header to {Active}' 'AddChange "{Active}"'
- # by default, we want to add headers
- HeadersOn
- AddMenu Project (- ''
- AddMenu Project 'Set Project…/π' 'Execute SetProjector'
- AddMenu Project 'Mount Project…/µ' 'Execute MountProjector'
- AddMenu Project 'Unmount Project…' 'Execute UnmountProjector'
- AddMenu Project '(-' ''
- AddMenu Project 'Check {Active} Out/J' 'CheckWindowOut "{Active}"'
- AddMenu Project 'Check {Active} In/I' 'CheckWindowIn "{Active}" && Close -c "{Active}"'
- AddMenu Project 'ModifyReadOnly {Active}' 'ModifyReadOnly "{Active}"'
- AddMenu Project 'Cancel {Active}' 'CancelWindowCheckOut "{Active}" && Close -c "{Active}"'
- AddMenu Project "(-" ""
- AddMenu Project 'Compare {Active}' 'CompareRevisions "{Active}" ∑∑ "{WorkSheet}"'
- AddMenu Project 'Merge {Active}' 'MergeBranch "{Active}" ∑∑ "{WorkSheet}"'
- AddMenu Project (- ''
- AddMenu Project 'Check Out…' 'CheckOut -w ≥≥ "{WorkSheet}"'
- AddMenu Project 'Check In…' 'CheckIn -w ≥≥ "{WorkSheet}"'
- AddMenu Project 'New Project…' 'NewProject -w ≥≥ "{WorkSheet}"'
- AddMenu Project (- ''
- AddMenu Project 'Check Out Newer' 'CheckOut -r -update'
- AddMenu Project 'Check In All Files' 'CheckinAll'
- AddMenu Project 'Open Checked-Out Files' 'OpenCheckedOut'
- Export ProjectHeaders
-
- Set Exit 1
-